home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Developer Source 18
/
Developer Source Volume 18 (I-MODE Publications, Inc.)(2000).iso
/
orinf
/
mar97
/
hipsf101.gif
< prev
next >
Tile
Graphics Interchange Format
|
1998-02-10
|
21.5 KB
|
316x327
|
4-bit (16 colors)
ocr:
DregePlocedere-Sulder; Elle Edit Iools Vindow Help ProgramUnt - SALEINCREASE Compial siply tron Dalete Closo Name SAL_ INCREASE Function Body) FUNCTION sal increase emp. nun nunoer) HETURN number IS dept_ nuR nuper; dept - incr numueri enp. incr number; incr numberi news sal number: sal nunber; - HEGIN select deptno, sal, increase_pet into dept_nun, sal, enp_incr Fron emp uhere empno = emp_nun; select increase_ _pct into dept_incr From dept uhere deptno - dept nURR incr : dept incr a (emp. incr/100)/190; new_sal :S sal + (salwincr); return (new_sal); END; NotModiied SucometupLong - - a Figure ...